From: Kenichi Handa <handa@m17n.org>
Date: Fri, 8 May 2009 02:24:30 +0000 (+0000)
Subject: (encoded-kbd-setup-keymap): Fix for big5.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~421^2~635
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=0957ee610beeb4301b5946db332e7ce0bf5aaebb;p=emacs.git

(encoded-kbd-setup-keymap): Fix for big5.
---

diff --git a/lisp/international/encoded-kb.el b/lisp/international/encoded-kb.el
index 4bd6231363f..a2efd390fc6 100644
--- a/lisp/international/encoded-kb.el
+++ b/lisp/international/encoded-kb.el
@@ -262,6 +262,14 @@ The following key sequence may cause multilingual text insertion."
 	(setq i (1+ i))))
     8)
 
+   ((eq (coding-system-type coding) 'big5)
+    (let ((i 128))
+      (while (< i 256)
+	(define-key keymap
+	  (vector i) 'encoded-kbd-self-insert-big5)
+	(setq i (1+ i))))
+    8)
+
    ((eq (coding-system-type coding) 'charset)
     (dolist (elt (mapcar
 		  #'(lambda (x)